home *** CD-ROM | disk | FTP | other *** search
/ The Utilities Experience / The Utilities Experience - Volume 1.iso / software / icons+tools / iconian / sources / emodules / mod / macros.e < prev    next >
Text File  |  1995-12-22  |  199b  |  13 lines
  1. OPT MODULE
  2. OPT EXPORT
  3.  
  4. MODULE    'graphics/rastport'
  5. MODULE    'intuition/intuition'
  6.  
  7. PROC setafpt(rast:PTR TO rastport,pattern,size)
  8.     IF rast
  9.         rast.areaptrn:=pattern
  10.         rast.areaptsz:=size
  11.     ENDIF
  12. ENDPROC
  13.